!file name=cmfdp1.h
      real(NBF),dimension(2) :: sfluxl,sfluxr
      real(NBF),pointer,dimension(:) :: y
      real(NBF),pointer,dimension(:,:) :: digf,delinvf,deliauf,dtill,dtilr,dhatl,dhatr,flcor
      real(NBF),pointer,dimension(:,:,:) :: czf
!
      common/cfpa/y
      common/cfpb/digf,delinvf,deliauf,dtill,dtilr,dhatl,dhatr,flcor
      common/cfpc/czf